Kopiere hele indholdet af en mappe?`

Prøv evt.

[pre]

Filecopy ("C:\\herskalderkopieresfra\\*.*, "C:\\herskalderkopierestil" )


er ikke helt sikker på syntaksten


>>>Swiatecki<<<

Heysa! Jeg skal kopiere hele indholdet af en mappe, til en anden mappe mappe. Men hvordan gør jeg?

Er det noget med at jeg skal bruge *.* ?

F.eks. kopiere indholdet af C:\\test til C:\\test2

[Redigeret d. 13/01-05 19:08:55 af JanC]

Well de forrige indlæg giver dig ikke muligheden for at flytte hele indholdet af en mappe til en anden mappe, som du gerne ønskede.

Her er en kode som sikkert vil være ret nyttig:

Sub Altframappetilmappe()
Dim fso
Dim sfol As String, dfol As String
sfol = "c:\\MAPPE1" ' Her er den mappe du vil flytte FRA
dfol = "e:\\MAPPE2" ' Her er den mappe du vil flytte TIL
Set fso = CreateObject("Scripting.FileSystemObject")
On Error Resume Next
If Not fso.FolderExists(sfol) Then
    MsgBox sfol & " findes ikke.", vbInformation, "Ugyldig sti" 'Besked der skal gives hvis sfol ikke findes.
ElseIf Not fso.FolderExists(dfol) Then
    MsgBox sfol & " findes ikke.", vbInformation, "Ugyldig sti" 'Besked der skal gives hvis dfol ikke findes.
Else
    fso.MoveFile (sfol & "\\*.*"), dfol ' Skift "\\*.*" til "\\*.xls" hvis du f.eks kun vil flytte excel filer
End If
If Err.Number = 53 Then MsgBox "Filen blev ikke fundet!"
End Sub

Med denne kode kan man, som du nok kan se, flytte hele indholdet af en mappe til en anden.
Desuden tjekker den om enten den mappe du flytter til eller fra eksisterer, hvis ikke melder den fejl.

Udover dette kan du også vælge at flytte en bestemt slags filtype


Mvh
Matt

Jeg prøvede med:

FileCopy "C:\\test\\*.*", "C:\\test2t"

Men får: 'Bad file name or number'

FileCopy "C:\\test\\*.*", "C:\\test2t\\*.*"


Med venlig hilsen
/Jokke Jensen
www.jj-multimediedesign.dk

Private Sub Command1_Click()
FileCopy "C:\\test\\*.*", "C:\\test2\\*.*"
End Sub

Det virker ikke. Får stadigvæk: 'Run time error '52' Bad file name or number'

Nok et dumt spørgsmål men eksisterer de 2 mapper der på din pc??





-----BEGIN GEEK CODE BLOCK-----
Version: 3.12
GED d- s: a--- C++ W++ w PS X+ tv+ b D G e- h! !r z--
------END GEEK CODE BLOCK------

Jaja. Troede jeg også var fejen til at starte med. Mappen test og mappen test 2 findes. Test 2 er tom, mens jeg har lagt 2 filer i test 1 som så skal kopieres.

Grunden til at det ikke virker, kan det ikke være fordi at man med FileCopy skal angive hvad filerne skal hede?

Jeg siger mange tak!